object Form1: TForm1
  Left = 192
  Top = 114
  Width = 696
  Height = 480
  Caption = 'Convers'#227'o do Cadastro de Clientes'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Gauge1: TGauge
    Left = 250
    Top = 408
    Width = 393
    Height = 33
    Progress = 0
    Visible = False
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 2
    Width = 320
    Height = 399
    DataSource = DataSource2
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  object DBGrid2: TDBGrid
    Left = 321
    Top = 2
    Width = 320
    Height = 401
    DataSource = DataSource1
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  object Button1: TButton
    Left = 0
    Top = 408
    Width = 129
    Height = 33
    Caption = '&Importar Tabela'
    TabOrder = 2
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 128
    Top = 408
    Width = 121
    Height = 33
    Caption = '&Finalizar'
    TabOrder = 3
    OnClick = Button2Click
  end
  object dbclientes: TTable
    Active = True
    DatabaseName = 'Gomide'
    IndexFieldNames = 'Codigo'
    TableName = 'clientes.db'
    Left = 656
    Top = 16
    object dbclientesCodigo: TSmallintField
      FieldName = 'Codigo'
    end
    object dbclientesNome: TStringField
      FieldName = 'Nome'
      Size = 80
    end
    object dbclientesFantasia: TStringField
      FieldName = 'Fantasia'
      Size = 80
    end
    object dbclientesCnpj: TStringField
      FieldName = 'Cnpj'
      Size = 18
    end
    object dbclientesCpf: TStringField
      FieldName = 'Cpf'
      Size = 14
    end
    object dbclientesEstadual: TStringField
      FieldName = 'Estadual'
    end
    object dbclientesMunicipal: TStringField
      FieldName = 'Municipal'
    end
    object dbclientesEndereco: TStringField
      FieldName = 'Endereco'
      Size = 80
    end
    object dbclientesCidade: TStringField
      FieldName = 'Cidade'
      Size = 40
    end
    object dbclientesUf: TStringField
      FieldName = 'Uf'
      Size = 2
    end
    object dbclientesCep: TStringField
      FieldName = 'Cep'
      Size = 11
    end
    object dbclientesFone1: TStringField
      FieldName = 'Fone1'
    end
    object dbclientesFone2: TStringField
      FieldName = 'Fone2'
    end
    object dbclientesFax: TStringField
      FieldName = 'Fax'
    end
    object dbclientesContato: TStringField
      FieldName = 'Contato'
      Size = 80
    end
    object dbclientesWebsite: TStringField
      FieldName = 'Website'
      Size = 80
    end
    object dbclientesEmail: TStringField
      FieldName = 'Email'
      Size = 80
    end
    object dbclientesHonorario: TCurrencyField
      FieldName = 'Honorario'
    end
    object dbclientesDia: TSmallintField
      FieldName = 'Dia'
    end
    object dbclientesSm: TIntegerField
      FieldName = 'Sm'
    end
    object dbclientesConta: TStringField
      FieldName = 'Conta'
      Size = 6
    end
  end
  object dbfclientes: TTable
    Active = True
    DatabaseName = 'Gomide'
    TableName = 'CLIENTES.DBF'
    Left = 656
    Top = 48
    object dbfclientesCLICODI: TSmallintField
      FieldName = 'CLICODI'
    end
    object dbfclientesCLINOME: TStringField
      FieldName = 'CLINOME'
      Size = 40
    end
    object dbfclientesCLIFANT: TStringField
      FieldName = 'CLIFANT'
      Size = 40
    end
    object dbfclientesCLICGC_: TStringField
      FieldName = 'CLICGC_'
      Size = 18
    end
    object dbfclientesCLIENDE: TStringField
      FieldName = 'CLIENDE'
      Size = 40
    end
    object dbfclientesCLICIDA: TStringField
      FieldName = 'CLICIDA'
      Size = 40
    end
    object dbfclientesCLIUF__: TStringField
      FieldName = 'CLIUF__'
      Size = 2
    end
    object dbfclientesCLICEP_: TStringField
      FieldName = 'CLICEP_'
      Size = 10
    end
    object dbfclientesCLIFON1: TStringField
      FieldName = 'CLIFON1'
      Size = 12
    end
    object dbfclientesCLIFON2: TStringField
      FieldName = 'CLIFON2'
      Size = 12
    end
    object dbfclientesCLIFAX_: TStringField
      FieldName = 'CLIFAX_'
      Size = 12
    end
    object dbfclientesCLICONT: TStringField
      FieldName = 'CLICONT'
      Size = 40
    end
    object dbfclientesCLIHONO: TFloatField
      FieldName = 'CLIHONO'
    end
    object dbfclientesCLIDIA_: TSmallintField
      FieldName = 'CLIDIA_'
    end
    object dbfclientesCLICF_D: TStringField
      FieldName = 'CLICF_D'
      Size = 17
    end
    object dbfclientesCONTA: TSmallintField
      FieldName = 'CONTA'
    end
    object dbfclientesPARAMETRO: TFloatField
      FieldName = 'PARAMETRO'
    end
  end
  object BatchMove1: TBatchMove
    Destination = dbclientes
    Source = dbfclientes
    Left = 656
    Top = 104
  end
  object DataSource1: TDataSource
    DataSet = dbclientes
    Left = 656
    Top = 160
  end
  object DataSource2: TDataSource
    DataSet = dbfclientes
    Left = 656
    Top = 200
  end
end
